home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 1 / ETO Development Tools 1.iso / Essentials / Developer Essentials Jul 90 / Programming / MPW Interfaces & Libraries 3.1 / AIncludes / Graf3DEqu.a < prev    next >
Encoding:
Text File  |  1989-10-13  |  2.7 KB  |  87 lines  |  [TEXT/MPS ]
  1. ; Version: 1.02
  2. ; Created: Tuesday, August 2, 1988 at 9:28:52 PM
  3. ;
  4. ; File: Graf3DEqu.a
  5. ;
  6. ; Assembler Interface to the Macintosh Libraries
  7. ; Copyright Apple Computer, Inc. 1984-1988
  8. ; All Rights Reserved
  9. ;
  10. ;-------------------------------------------------------------------------
  11. ; Equates for Graf3D
  12. ; Three-dimensional graphics routines layered on top of QuickDraw
  13. FixRad            EQU         3754936                 ;radConst = 57.29578
  14. FracRad         EQU         1073741824
  15. ;offsets
  16. ;Point3D and Point2D
  17. x                EQU         0                        ;Fixed
  18. y                EQU         4                        ;Fixed
  19. z                EQU         8                        ;Fixed
  20. ;XfMatrix = ARRAY[0..3,0..3] OF fixed
  21. xf00            EQU         0
  22. xf01            EQU         4
  23. xf02            EQU         8
  24. xf03            EQU         12
  25. xf10            EQU         16
  26. xf11            EQU         20
  27. xf12            EQU         24
  28. xf13            EQU         28
  29. xf20            EQU         32
  30. xf21            EQU         36
  31. xf22            EQU         40
  32. xf23            EQU         44
  33. xf30            EQU         48
  34. xf31            EQU         52
  35. xf32            EQU         56
  36. xf33            EQU         60
  37. ;Port3D
  38. GrPort            EQU         0                        ;GrafPtr
  39. viewRect        EQU         4                        ;Rect
  40. xLeft            EQU         12                        ;Fixed
  41. yTop            EQU         16                        ;Fixed
  42. xRight            EQU         20                        ;Fixed
  43. yBottom         EQU         24                        ;Fixed
  44. pen             EQU         28                        ;Point3D
  45. penPrime        EQU         40                        ;Point3D
  46. eye             EQU         52                        ;Point3D
  47. hSize            EQU         64                        ;Fixed
  48. vSize            EQU         68                        ;Fixed
  49. hCenter         EQU         72                        ;Fixed
  50. vCenter         EQU         76                        ;Fixed
  51. xCotan            EQU         80                        ;Fixed
  52. yCotan            EQU         84                        ;Fixed
  53. ident            EQU         88                        ;BOOLEAN
  54. xForm            EQU         90                        ;XfMatrix
  55. szPort3D        EQU         154                     ;size of Port3D
  56.                 IMPORT        InitGrf3D, Open3DPort, SetPort3D, GetPort3D
  57. ;PROCEDURE InitGrf3D (globalPtr: Ptr);
  58. ;PROCEDURE Open3DPort (port: Port3DPtr);
  59. ;PROCEDURE SetPort3D (port: Port3DPtr);
  60. ;PROCEDURE GetPort3D (VAR port: Port3DPtr);
  61.                 IMPORT        MoveTo2D, MoveTo3D, LineTo2D, LineTo3D, Move2D, Move3D, Line2D, Line3D
  62. ;PROCEDURE MoveTo2D (x,y: Fixed);
  63. ;PROCEDURE MoveTo3D (x,y,z: Fixed);
  64. ;PROCEDURE LineTo2D (x,y: Fixed);
  65. ;PROCEDURE LineTo3D (x,y,z: Fixed);
  66. ;PROCEDURE Move2D (dx,dy: Fixed);
  67. ;PROCEDURE Move3D (dx,dy,dz: Fixed);
  68. ;PROCEDURE Line2D (dx,dy: Fixed);
  69. ;PROCEDURE Line3D (dx,dy,dz: Fixed);
  70.                 IMPORT        ViewPort, LookAt, ViewAngle, Identity, Scale, Translate, Pitch, Yaw
  71.                 IMPORT        Roll, Skew, TransForm, Clip3D
  72. ;PROCEDURE ViewPort (r: Rect);
  73. ;PROCEDURE LookAt (left,top,right,bottom: Fixed);
  74. ;PROCEDURE ViewAngle (angle: Fixed);
  75. ;PROCEDURE Identity;
  76. ;PROCEDURE Scale (xFactor,yFactor,zFactor: Fixed);
  77. ;PROCEDURE Translate (dx,dy,dz: Fixed);
  78. ;PROCEDURE Pitch (xAngle: Fixed);
  79. ;PROCEDURE Yaw (yAngle: Fixed);
  80. ;PROCEDURE Roll (zAngle: Fixed);
  81. ;PROCEDURE Skew (zAngle: Fixed);
  82. ;PROCEDURE TransForm (src: Point3D; VAR dst: Point3D);
  83. ;FUNCTION Clip3D (src1,src2: Point3D; VAR dst1,dst2: POINT): BOOLEAN;
  84.                 IMPORT        SetPt3D, SetPt2D
  85. ;PROCEDURE SetPt3D (VAR pt3D: Point3D; x,y,z: fixed);
  86. ;PROCEDURE SetPt2D (VAR pt2D: Point2D; x,y: fixed);
  87.